home *** CD-ROM | disk | FTP | other *** search
/ 404 Jogos / CLJG.iso / Esportes / PlanetRacer.swf / scripts / DefineButton2_1130 / BUTTONCONDACTION on(release).as
Text File  |  2007-09-26  |  1KB  |  60 lines
  1. on(release){
  2.    ┬º┬ºpush(true);
  3.    ┬º┬ºpush(false);
  4.    ┬º┬ºpush(false);
  5.    ┬º┬ºpush(true);
  6.    while(true)
  7.    {
  8.       if(┬º┬ºpop())
  9.       {
  10.       }
  11.       if(┬º┬ºpop())
  12.       {
  13.       }
  14.       if(┬º┬ºpop())
  15.       {
  16.          break;
  17.       }
  18.       ┬º┬ºpush(true);
  19.       ┬º┬ºpush(false);
  20.    }
  21.    e = 1;
  22.    while(e <= 100)
  23.    {
  24.       if(f.g > f.h[e])
  25.       {
  26.          set(┬º┬ºconstant(4),100);
  27.          while(eval(┬º┬ºconstant(4)) >= e + 1)
  28.          {
  29.             f.h[eval(┬º┬ºconstant(4))] = f.h[eval(┬º┬ºconstant(4)) - 1];
  30.             f[┬º┬ºconstant(5)][eval(┬º┬ºconstant(4))] = f[┬º┬ºconstant(5)][eval(┬º┬ºconstant(4)) - 1];
  31.             set(┬º┬ºconstant(4),eval(┬º┬ºconstant(4)) - 1);
  32.          }
  33.          f.h[e] = f.g;
  34.          f[┬º┬ºconstant(5)][e] = f[┬º┬ºconstant(6)];
  35.          e = 31;
  36.       }
  37.       e++;
  38.    }
  39.    e = 1;
  40.    while(e <= 100)
  41.    {
  42.       if(f.g > f[┬º┬ºconstant(7)][e])
  43.       {
  44.          set(┬º┬ºconstant(4),100);
  45.          while(eval(┬º┬ºconstant(4)) >= e + 1)
  46.          {
  47.             f[┬º┬ºconstant(7)][eval(┬º┬ºconstant(4))] = f[┬º┬ºconstant(7)][eval(┬º┬ºconstant(4)) - 1];
  48.             f[┬º┬ºconstant(8)][eval(┬º┬ºconstant(4))] = f[┬º┬ºconstant(8)][eval(┬º┬ºconstant(4)) - 1];
  49.             set(┬º┬ºconstant(4),eval(┬º┬ºconstant(4)) - 1);
  50.          }
  51.          f[┬º┬ºconstant(7)][e] = f.g;
  52.          f[┬º┬ºconstant(8)][e] = f[┬º┬ºconstant(6)];
  53.          e = 31;
  54.       }
  55.       e++;
  56.    }
  57.    gotoAndStop("submit");
  58.    play();
  59. }
  60.